Form1
Fonts Ahoy!
Form1,
Label3
Label4
Label5
Color
Label1
ckBold
Check1
Label6
DisplayText
Option1
Command1
FontList
SizeList
		ColorList
Label2
Italic
ckItalic
Check2
Label7
DisplayText
Option2
Text1
Form_Click
@	Form_LoadD
Form_Resize
Text1
Width
Height
Combo1P
Left%
Screen
Form1
ValChangeFlag
CharChangeFlat
OldValueText
OldCharText
GetDisplayText
ViewText
ShowDisplayTextp
FontName
FontList
SizeList3
FontSize
	ForeColor
	ColorList
DisplayText
Valuef
Text2Display
	FontCount
Fonts
	ListIndex
	ListCount
FontBold
FALSE
FontItalic
FontStrikethruv
FontUnderlined
Command1_Click
Label2_Click
ckBold_Click
ckBoldG
CHECKED
ckItalic_Click
ckItalic
FontList_Change5
FontList_Click
ColorList_Change
DisplayText_Click
Index
SizeList_Change
SizeList_Click
Text1_ChangeR
Text1_GotFocus
Enabledp
Text1_KeyPress
KeyAscii
Text1_LostFocus
ColorList_Click
Italic
	ScrollBar
	Minimized
WindowState
ScaleWidth
ScaleHeightH
Form_Load
Initialize form and text positions
Initialize font list
 Set default font
Initialize font size list
 Initialize colors
0  - Black
1  - Blue"
2  - Green
3  - Cyan"
4  - Red
5  - Magenta
6  - Brown
7  - White
8  - Gray"
9  - Light Blue"
10 - Light Green
11 - Light Cyan"
12 - Light Red
13 - Light Magenta
14 - Yellow"
15 - Bright White"
 Initialize font attributes OFF
 Initialize Option buttons
Form_Resize
GetDisplayText
 Make the standard text to display
 Pad with space for Italic
ShowDisplayText
 Get the font name
 Get the font size
 Get the foreground color
Command1_Click
ckBold_Click
ckItalic_Click
 Toggle Italic
FontList_Click
DisplayText_Click
SizeList_Click
Text1_GotFocus
Text1_KeyPress
Text1_LostFocus
ColorList_Click